﻿<%@ Page Title="" Language="VB" Inherits="System.Web.Mvc.ViewPage(Of IEnumerable(Of Dirección))" %>
<!DOCTYPE html>
<html>
    <head>
        <title>Etiquetas de envío - ASINDO</title>
        <style type="text/css">
            body 
            {
                font-family: Tahoma;
                font-size: 9pt;
                margin: 0;
            }
            .etiqueta 
            {
                border: 1mm solid black;
                padding: 4mm;
                width: 103mm;
                height: 22.75mm;
                float:left;
            }
            
            .page_break
            {
                page-break-after: always;
            }
        </style>
    </head>
    <body>
    <% Dim i As Integer = 0%>
    <% For Each item In Model%>
    <% Dim pacientes = item.Personas.OfType(Of Paciente)()%>
    <% If pacientes.Count > 0 Then %>
        <div class="etiqueta">
    <%      For Each itPac In pacientes.Take(4)%>
                <strong><%: itPac.NombreCompleto%></strong><br />
    <%      Next%>
    <% If pacientes.Count > 4 Then %>
                <strong>...</strong><br />
    <% End If %>
                <%= item.Completa2("<br />")%>
        </div>
    <% i+=1 %>
    <% If i Mod 6 = 0 Then%>
        <div class="page_break"></div>
    <% End If%>
    <% End If%>
    <% Next%>

</body>
</html>

